home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 September
/
CHIP Eylül 1998.iso
/
demolar
/
lokman
/
DISK1
/
_SETUP.4
/
Group1
/
Demo8E.exe
/
0
/
RCDATA
/
TQRMDFORM
/
TQRMDFORM.txt
< prev
Wrap
Text File
|
1998-07-30
|
88KB
|
3,871 lines
object QRMDForm: TQRMDForm
Left = 25
Top = 82
Width = 580
Height = 307
HorzScrollBar.Range = 1200
VertScrollBar.Range = 2000
ActiveControl = BitBtnONIZ
AutoScroll = False
Caption = 'Ka�eli Re�ete Arkas� D�k�m�'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Scaled = False
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object PageHeader: TQRBand
Left = 0
Top = 0
Width = 1200
Height = 33
Align = alTop
BandType = rbGroupHeader
BeforePrint = PageHeaderBeforePrint
Color = clWhite
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ForceNewPage = False
Frame.Width = 0
Frame.DrawTop = True
Frame.DrawBottom = True
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = Detail
ParentFont = False
Ruler = qrrCmHV
object ShQRDBasBN: TQRShape
Left = 247
Top = 17
width = 71
Height = 16
Shape = qrsRectangle
end
object QRDBasBN: TQRDBText
Left = 248
Top = 18
Width = 71
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeN'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object ShapeFiy: TQRShape
Left = 174
Top = 17
width = 74
Height = 16
Shape = qrsRectangle
end
object QRLabel13: TQRLabel
Left = 190
Top = 18
Width = 34
Height = 14
Caption = 'F�YATI'
AlignToBand = False
end
object ShQRDBasBMR: TQRShape
Left = 536
Top = 17
width = 70
Height = 16
Shape = qrsRectangle
end
object ShQRDBasBH: TQRShape
Left = 461
Top = 17
width = 70
Height = 16
Shape = qrsRectangle
end
object ShQRDBasBO: TQRShape
Left = 389
Top = 17
width = 70
Height = 16
Shape = qrsRectangle
end
object ShQRDBasBI: TQRShape
Left = 320
Top = 17
width = 70
Height = 16
Shape = qrsRectangle
end
object QRDBasBMR: TQRDBText
Left = 536
Top = 18
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeMR'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object QRDBasBH: TQRDBText
Left = 464
Top = 18
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeH'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object QRDBasBO: TQRDBText
Left = 391
Top = 18
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeO'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object QRDBasBI: TQRDBText
Left = 319
Top = 18
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeI'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object ShapeUrun: TQRShape
Left = 29
Top = 17
width = 146
Height = 16
Shape = qrsRectangle
end
object ShapAdet: TQRShape
Left = 0
Top = 17
width = 30
Height = 16
Shape = qrsRectangle
end
object QRLabel1: TQRLabel
Left = 2
Top = 18
Width = 25
Height = 14
Caption = 'Adet'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel12: TQRLabel
Left = 37
Top = 18
Width = 63
Height = 14
Caption = '�R�N�N ADI'
AlignToBand = False
end
object QRDBText8: TQRDBText
Left = 1
Top = 0
Width = 206
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'AD'
OnPrint = QRDBText8Print
end
object QRDBText10: TQRDBText
Left = 213
Top = 0
Width = 236
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HASTANO'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
end
object Master3: TQRBand
Left = 0
Top = 48
Width = 1200
Height = 82
Align = alTop
BandType = rbGroupFooter
BeforePrint = Master3BeforePrint
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Ruler = qrrCmHV
object ShBakiN: TQRShape
Left = 247
Top = 31
width = 72
Height = 17
Shape = qrsRectangle
end
object ShQIndirN: TQRShape
Left = 247
Top = 15
width = 72
Height = 17
Shape = qrsRectangle
end
object QIndirN: TQRDBText
Left = 248
Top = 15
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirN'
Transparent = True
end
object ShQNetN: TQRShape
Left = 247
Top = 63
width = 72
Height = 17
Shape = qrsRectangle
end
object ShQHKPn: TQRShape
Left = 247
Top = 47
width = 72
Height = 17
Shape = qrsRectangle
end
object ShCalcBN: TQRShape
Left = 247
Top = -1
width = 72
Height = 17
Shape = qrsRectangle
end
object QNetN: TQRDBText
Left = 248
Top = 62
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetN'
Transparent = True
end
object QHKPn: TQRDBText
Left = 248
Top = 47
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPn'
Transparent = True
end
object CalcBN: TQRDBCalc
Left = 248
Top = 1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bN'
Transparent = True
Operation = qrcSUM
PrintMask = '#,#'
ResetBand = Master3
end
object ShapeNetKal: TQRShape
Left = 174
Top = 63
width = 74
Height = 17
Shape = qrsRectangle
end
object ShapeKatP: TQRShape
Left = 174
Top = 47
width = 74
Height = 17
Shape = qrsRectangle
end
object ShapeBak: TQRShape
Left = 174
Top = 31
width = 74
Height = 17
Shape = qrsRectangle
end
object ShapeIsk: TQRShape
Left = 174
Top = 15
width = 74
Height = 17
Shape = qrsRectangle
end
object ShapeTop: TQRShape
Left = 174
Top = -1
width = 74
Height = 17
Shape = qrsRectangle
end
object QRLabel10: TQRLabel
Left = 184
Top = 64
Width = 56
Height = 14
Caption = 'Net Kalan :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel7: TQRLabel
Left = 192
Top = 48
Width = 48
Height = 14
Caption = 'Kat.Pay� :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel14: TQRLabel
Left = 198
Top = 32
Width = 42
Height = 14
Caption = 'Bakiye :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel6: TQRLabel
Left = 192
Top = 16
Width = 48
Height = 13
Caption = '�skonto :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel16: TQRLabel
Left = 190
Top = 1
Width = 54
Height = 12
AutoSize = False
Caption = 'TOPLAM'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object ShBakiI: TQRShape
Left = 317
Top = 31
width = 72
Height = 17
Shape = qrsRectangle
end
object QBakiI: TQRDBText
Left = 319
Top = 32
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiI'
Transparent = True
end
object ShQNetMR: TQRShape
Left = 536
Top = 63
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQHKPmr: TQRShape
Left = 536
Top = 47
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQHKPh: TQRShape
Left = 461
Top = 47
width = 73
Height = 17
Shape = qrsRectangle
end
object ShQNetH: TQRShape
Left = 461
Top = 63
width = 73
Height = 17
Shape = qrsRectangle
end
object ShQNetO: TQRShape
Left = 389
Top = 63
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQHKPo: TQRShape
Left = 389
Top = 47
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQHKPi: TQRShape
Left = 317
Top = 47
width = 72
Height = 17
Shape = qrsRectangle
end
object ShQNetI: TQRShape
Left = 317
Top = 63
width = 72
Height = 17
Shape = qrsRectangle
end
object ShBakiMR: TQRShape
Left = 536
Top = 31
width = 70
Height = 17
Shape = qrsRectangle
end
object ShBakiH: TQRShape
Left = 461
Top = 31
width = 73
Height = 17
Shape = qrsRectangle
end
object ShBakiO: TQRShape
Left = 389
Top = 31
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQIndirMR: TQRShape
Left = 536
Top = 15
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQIndirH: TQRShape
Left = 461
Top = 15
width = 73
Height = 17
Shape = qrsRectangle
end
object ShQIndirO: TQRShape
Left = 389
Top = 15
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQIndirI: TQRShape
Left = 317
Top = 15
width = 72
Height = 17
Shape = qrsRectangle
end
object QNetMR: TQRDBText
Left = 536
Top = 62
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetMR'
Transparent = True
end
object QNetH: TQRDBText
Left = 463
Top = 62
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetH'
Transparent = True
end
object QNetO: TQRDBText
Left = 390
Top = 62
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetO'
Transparent = True
end
object QNetI: TQRDBText
Left = 319
Top = 62
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetI'
Transparent = True
end
object QIndirI: TQRDBText
Left = 319
Top = 15
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirI'
Transparent = True
end
object QIndirO: TQRDBText
Left = 390
Top = 15
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirO'
Transparent = True
end
object QHKPi: TQRDBText
Left = 319
Top = 47
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPi'
Transparent = True
end
object QHKPo: TQRDBText
Left = 390
Top = 47
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPo'
Transparent = True
end
object QBakiO: TQRDBText
Left = 390
Top = 32
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiO'
Transparent = True
end
object QIndirH: TQRDBText
Left = 463
Top = 15
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirH'
Transparent = True
end
object QHKPh: TQRDBText
Left = 463
Top = 47
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPh'
Transparent = True
end
object QBakiH: TQRDBText
Left = 463
Top = 32
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiH'
Transparent = True
end
object QIndirMR: TQRDBText
Left = 536
Top = 15
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirMR'
Transparent = True
end
object QBakiMR: TQRDBText
Left = 536
Top = 32
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiMR'
Transparent = True
end
object QHKPmr: TQRDBText
Left = 536
Top = 47
Width = 70
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPmr'
Transparent = True
end
object ShCalcBMR: TQRShape
Left = 535
Top = -1
width = 70
Height = 17
Shape = qrsRectangle
end
object ShCalcBH: TQRShape
Left = 460
Top = -1
width = 73
Height = 17
Shape = qrsRectangle
end
object ShCalcBO: TQRShape
Left = 388
Top = -1
width = 70
Height = 17
Shape = qrsRectangle
end
object ShCalcBI: TQRShape
Left = 316
Top = -1
width = 72
Height = 17
Shape = qrsRectangle
end
object CalcBMR: TQRDBCalc
Left = 536
Top = 1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bMR'
Transparent = True
Operation = qrcSUM
PrintMask = '#,#'
ResetBand = Master3
end
object CalcBH: TQRDBCalc
Left = 463
Top = 1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bH'
Transparent = True
Operation = qrcSUM
PrintMask = '#,#'
ResetBand = Master3
end
object CalcBO: TQRDBCalc
Left = 390
Top = 1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bO'
Transparent = True
Operation = qrcSUM
PrintMask = '#,#'
ResetBand = Master3
end
object CalcBI: TQRDBCalc
Left = 319
Top = 1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bI'
Transparent = True
Operation = qrcSUM
PrintMask = '#,#'
ResetBand = Master3
end
object QRShape12: TQRShape
Left = 1
Top = 63
width = 174
Height = 17
Shape = qrsRectangle
end
object QRLabel15: TQRLabel
Left = 3
Top = 64
Width = 90
Height = 14
Caption = 'GENEL TOPLAM :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object TextGENEL: TQRDBText
Left = 93
Top = 64
Width = 80
Height = 15
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NETSON'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QBakiN: TQRDBText
Left = 248
Top = 32
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiN'
Transparent = True
end
end
object Detail: TQRBand
Left = 0
Top = 33
Width = 1200
Height = 15
Align = alTop
BandType = rbSubDetail
BeforePrint = DetailBeforePrint
Color = clWhite
ForceNewPage = False
Frame.Style = psInsideFrame
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = Master3
Ruler = qrrNone
object ShapeFiyDat: TQRShape
Left = 175
Top = -2
width = 73
Height = 17
Shape = qrsRectangle
end
object QRDBText14: TQRDBText
Left = 175
Top = -1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'FIYAT'
end
object ShQRDBrutN: TQRShape
Left = 247
Top = -2
width = 72
Height = 17
Shape = qrsRectangle
end
object ShapUrDat: TQRShape
Left = 29
Top = -2
width = 146
Height = 17
Shape = qrsRectangle
end
object QRDBText12: TQRDBText
Left = 32
Top = -1
Width = 140
Height = 14
AlignToBand = False
DataSource = DS_SATIS
DataField = 'ILAD'
OnPrint = QRDBText12Print
end
object ShQRDBrutMR: TQRShape
Left = 536
Top = -2
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQRDBrutH: TQRShape
Left = 461
Top = -2
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQRDBrutO: TQRShape
Left = 392
Top = -2
width = 70
Height = 17
Shape = qrsRectangle
end
object ShQRDBrutI: TQRShape
Left = 320
Top = -2
width = 70
Height = 17
Shape = qrsRectangle
end
object QRDBrutMR: TQRDBText
Left = 539
Top = -1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bMR'
Transparent = True
end
object QRDBrutH: TQRDBText
Left = 464
Top = -1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bH'
Transparent = True
end
object QRDBrutO: TQRDBText
Left = 391
Top = -1
Width = 70
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bO'
Transparent = True
end
object QRDBrutI: TQRDBText
Left = 320
Top = -1
Width = 69
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bI'
Transparent = True
end
object ShAdetDat: TQRShape
Left = 0
Top = -2
width = 30
Height = 17
Shape = qrsRectangle
end
object QRDBText13: TQRDBText
Left = 4
Top = -1
Width = 20
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'MIKTAR'
end
object QRDBrutN: TQRDBText
Left = 248
Top = -1
Width = 69
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_SATIS
DataField = 'bN'
Transparent = True
end
end
object Master1: TQRBand
Left = 0
Top = 130
Width = 1200
Height = 79
Align = alTop
BandType = rbDetail
BeforePrint = Master1BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanBas2
Ruler = qrrCmHV
object QRShDat1: TQRShape
Left = 114
Top = 60
width = 160
Height = 19
Shape = qrsRectangle
end
object QRShBas1: TQRShape
Left = 0
Top = 60
width = 115
Height = 19
Shape = qrsRectangle
end
object QRDBas1: TQRDBText
Left = 3
Top = 61
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET1'
end
object QRecBas1: TQRDBText
Left = 117
Top = 61
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS1'
end
object QRShape4: TQRShape
Left = 0
Top = 0
width = 274
Height = 61
Shape = qrsRectangle
end
object QRLabel17: TQRLabel
Left = 132
Top = 46
Width = 126
Height = 14
Caption = 'TLF:(0212) 222 43 39 - 40'
AlignToBand = False
end
object QRLabel8: TQRLabel
Left = 4
Top = 18
Width = 116
Height = 14
AutoSize = False
Caption = 'Ecz.Lokman Hekim'
AlignToBand = False
end
object QRLabel25: TQRLabel
Left = 71
Top = 3
Width = 125
Height = 14
Caption = 'MEKATRON�K ECZANES�'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel26: TQRLabel
Left = 5
Top = 33
Width = 233
Height = 14
Caption = 'PERPA Kat:11 No:1680 OKMEYDANI / �STANBUL'
AlignToBand = False
end
end
object QRBanBas2: TQRBand
Left = 0
Top = 209
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanBas2BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanBas3
Ruler = qrrNone
object QRShDat2: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object RecBas2: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS2'
end
object QRShBas2: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRDBas2: TQRDBText
Left = 3
Top = 0
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET2'
end
end
object QRBanBas3: TQRBand
Left = 0
Top = 227
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanBas3BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanBas4
Ruler = qrrNone
object QRShDat3: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object RecBas3: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS3'
end
object QRShBas3: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRDBas3: TQRDBText
Left = 3
Top = 0
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET3'
end
end
object QRBanBas4: TQRBand
Left = 0
Top = 245
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanBas4BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanBas5
Ruler = qrrNone
object QRShDat4: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object RecBas4: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS4'
end
object QRShBas4: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRDBas4: TQRDBText
Left = 3
Top = 0
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET4'
end
end
object QRBanBas5: TQRBand
Left = 0
Top = 263
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanBas5BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanBas6
Ruler = qrrNone
object QRShDat5: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRShBas5: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object RecBas5: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS5'
end
object QRDBas5: TQRDBText
Left = 3
Top = 0
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET5'
end
end
object QRBanBas6: TQRBand
Left = 0
Top = 281
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanBas6BeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanVize
Ruler = qrrNone
object QRShDat6: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRShBas6: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object RecBas6: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BAS6'
end
object QRDBas6: TQRDBText
Left = 3
Top = 0
Width = 108
Height = 17
AlignToBand = False
DataSource = DS_KRMLAR
DataField = 'ETIKET6'
end
end
object QRBanVize: TQRBand
Left = 0
Top = 299
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanVizeBeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBanPr
Ruler = qrrNone
object QRShViz2: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRShViz1: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRLViz: TQRLabel
Left = 3
Top = 0
Width = 108
Height = 17
Caption = 'Vize Tarihi :'
AlignToBand = False
end
object QRDBTVize: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'VIZETRH'
end
end
object QRBanPr: TQRBand
Left = 0
Top = 317
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRBanPrBeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRecKayDef
Ruler = qrrNone
object QRShapePr2: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRDBEczPr: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'PROTOKOLNO'
end
object QRShapePr1: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QEczPr: TQRLabel
Left = 3
Top = 0
Width = 108
Height = 17
AutoSize = False
Caption = 'Protokol No:'
AlignToBand = False
end
end
object QRecKayDef: TQRBand
Left = 0
Top = 335
Width = 1200
Height = 18
Align = alTop
BandType = rbDetail
BeforePrint = QRecKayDefBeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRSon
Ruler = qrrNone
object QRShape1: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRDBText6: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'RKDEFTERNO'
end
object QRShape2: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRLabelRKD: TQRLabel
Left = 3
Top = 0
Width = 108
Height = 17
AutoSize = False
Caption = 'Re�.Kay�t Def.No'
AlignToBand = False
end
end
object QRSon: TQRBand
Left = 0
Top = 353
Width = 1200
Height = 92
Align = alTop
BandType = rbDetail
BeforePrint = QRSonBeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
LinkBand = QRBandUZ
Ruler = qrrNone
object QRDBText25: TQRDBText
Left = 116
Top = 65
Width = 237
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HASTANO'
end
object QRLabel4: TQRLabel
Left = 2
Top = 66
Width = 112
Height = 14
Caption = '�lac� Alan�n Ad� Soyad� :'
AlignToBand = False
end
object NelerAldim: TQRLabel
Left = 2
Top = 51
Width = 51
Height = 14
Caption = 'NelerAldim'
AlignToBand = False
end
object QRLabel11: TQRLabel
Left = 2
Top = 79
Width = 25
Height = 14
Caption = '�MZA'
AlignToBand = False
end
object Katkim: TQRLabel
Left = 2
Top = 36
Width = 31
Height = 14
Caption = 'Katkim'
AlignToBand = False
end
object QRShape16: TQRShape
Left = 114
Top = -1
width = 160
Height = 19
Shape = qrsRectangle
end
object QRShape8: TQRShape
Left = 0
Top = -1
width = 115
Height = 19
Shape = qrsRectangle
end
object QRLabel9: TQRLabel
Left = 3
Top = 0
Width = 108
Height = 17
AutoSize = False
Caption = '�la�.Verili� Trh:'
AlignToBand = False
end
object QRDBText11: TQRDBText
Left = 117
Top = 0
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'ALTARIH'
end
object QRShape20: TQRShape
Left = 0
Top = 17
width = 115
Height = 19
Shape = qrsRectangle
end
object QRShape21: TQRShape
Left = 114
Top = 17
width = 160
Height = 19
Shape = qrsRectangle
end
object QRLabel3: TQRLabel
Left = 3
Top = 18
Width = 108
Height = 17
AutoSize = False
Caption = 'Re�ete Tutar�'
AlignToBand = False
end
object TextRTUT: TQRDBText
Left = 117
Top = 18
Width = 153
Height = 17
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUT'
end
object QRDBCalc1: TQRDBCalc
Left = 362
Top = 77
Width = 6
Height = 14
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
DataSource = DS_RECKOPYA
DataField = 'HASTANO'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
Operation = qrcCOUNT
end
end
object QRBandUZ: TQRBand
Left = 0
Top = 445
Width = 1200
Height = 16
Align = alTop
BandType = rbDetail
BeforePrint = QRBandUZBeforePrint
Color = clWhite
ForceNewPage = False
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Ruler = qrrNone
object QRLabel2: TQRLabel
Left = 7
Top = 0
Width = 8
Height = 14
Caption = 'O'
AlignToBand = False
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
end
object QRSum: TQRBand
Left = 0
Top = 461
Width = 1200
Height = 169
Align = alTop
BandType = rbSummary
BeforePrint = QRSumBeforePrint
Color = clWhite
ForceNewPage = False
Frame.Width = 0
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Ruler = qrrNone
object QRShape7: TQRShape
Left = 6
Top = 8
width = 618
Height = 139
Shape = qrsRectangle
end
object QRShape3: TQRShape
Left = 419
Top = 9
width = 104
Height = 120
Shape = qrsRightAndLeft
end
object QRShape24: TQRShape
Left = 217
Top = 9
width = 100
Height = 120
Shape = qrsRightAndLeft
end
object QRLabel18: TQRLabel
Left = 144
Top = 149
Width = 114
Height = 14
Caption = 'Toplam Re�ete Say�s� :'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsItalic]
ParentFont = False
end
object QRDBCalc2: TQRDBCalc
Left = 269
Top = 150
Width = 53
Height = 14
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HASTANO'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsItalic]
ParentFont = False
Operation = qrcCOUNT
PrintMask = '#,##0 Adet'
end
object QRLabel19: TQRLabel
Left = 38
Top = 93
Width = 73
Height = 14
Caption = 'KATILIM PAYI'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SumBakiCalcN: TQRDBCalc
Left = 120
Top = 75
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiN'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object QRLabel20: TQRLabel
Left = 51
Top = 111
Width = 60
Height = 14
Caption = 'NET KALAN'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object SumHKPCalcN: TQRDBCalc
Left = 120
Top = 92
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPn'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBrCalcN: TQRDBCalc
Left = 120
Top = 37
Width = 90
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUTN'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object QRShape26: TQRShape
Left = 7
Top = 91
width = 616
Height = 4
Shape = qrsHorLine
end
object QRShape27: TQRShape
Left = 7
Top = 109
width = 616
Height = 4
Shape = qrsHorLine
end
object QRLabel21: TQRLabel
Left = 25
Top = 38
Width = 86
Height = 14
Caption = 'TOPLAM TUTAR'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel22: TQRLabel
Left = 9
Top = 56
Width = 102
Height = 14
Caption = 'KURUM �SKONTOSU'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel23: TQRLabel
Left = 73
Top = 74
Width = 38
Height = 14
Caption = 'BAK�YE'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRLabel24: TQRLabel
Left = 27
Top = 129
Width = 84
Height = 14
Caption = 'GENEL TOPLAM'
AlignToBand = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object QRShape28: TQRShape
Left = 7
Top = 72
width = 616
Height = 4
Shape = qrsHorLine
end
object QRShape29: TQRShape
Left = 7
Top = 128
width = 616
Height = 4
Shape = qrsHorLine
end
object SumBrCalcI: TQRDBCalc
Left = 222
Top = 36
Width = 90
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUTI'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBrCalcO: TQRDBCalc
Left = 320
Top = 37
Width = 90
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUTO'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumIndirCalcN: TQRDBCalc
Left = 120
Top = 55
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirN'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumIndirCalcI: TQRDBCalc
Left = 222
Top = 55
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirI'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumIndirCalcO: TQRDBCalc
Left = 320
Top = 55
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirO'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumNetCalcN: TQRDBCalc
Left = 120
Top = 111
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetN'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumNetCalcI: TQRDBCalc
Left = 222
Top = 111
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetI'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumNetCalcO: TQRDBCalc
Left = 320
Top = 111
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetO'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object QRDBText5: TQRDBText
Left = 140
Top = 13
Width = 65
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeN'
end
object QRDBText9: TQRDBText
Left = 234
Top = 13
Width = 65
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeI'
end
object QRDBText4: TQRDBText
Left = 331
Top = 13
Width = 65
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeO'
end
object QRShape25: TQRShape
Left = 7
Top = 53
width = 616
Height = 4
Shape = qrsHorLine
end
object QRShape30: TQRShape
Left = 7
Top = 33
width = 616
Height = 4
Shape = qrsHorLine
end
object QRShape31: TQRShape
Left = 115
Top = 9
width = 4
Height = 137
Shape = qrsVertLine
end
object SumBakiCalcI: TQRDBCalc
Left = 222
Top = 74
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiI'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBakiCalcO: TQRDBCalc
Left = 320
Top = 74
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiO'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumHKPCalcI: TQRDBCalc
Left = 222
Top = 92
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPi'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumHKPCalcO: TQRDBCalc
Left = 320
Top = 92
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPo'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object TopSonCalc: TQRDBCalc
Left = 126
Top = 129
Width = 261
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NETSON'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object QRDBText7: TQRDBText
Left = 435
Top = 13
Width = 65
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeH'
end
object SumBrCalcH: TQRDBCalc
Left = 427
Top = 37
Width = 90
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUTH'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumIndirCalcH: TQRDBCalc
Left = 427
Top = 55
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirH'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBakiCalcH: TQRDBCalc
Left = 427
Top = 74
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiH'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumHKPCalcH: TQRDBCalc
Left = 427
Top = 92
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPh'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumNetCalcH: TQRDBCalc
Left = 427
Top = 110
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetH'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBrCalcMR: TQRDBCalc
Left = 525
Top = 37
Width = 90
Height = 14
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BRUTMR'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumIndirCalcMR: TQRDBCalc
Left = 525
Top = 55
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'IndirMR'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumBakiCalcMR: TQRDBCalc
Left = 525
Top = 74
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'BakiMR'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumHKPCalcMR: TQRDBCalc
Left = 525
Top = 92
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'HKPmr'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object SumNetCalcMR: TQRDBCalc
Left = 525
Top = 110
Width = 90
Height = 17
Alignment = taRightJustify
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'NetMR'
Operation = qrcSUM
PrintMask = '#,# TL'
end
object QRDBText15: TQRDBText
Left = 533
Top = 13
Width = 65
Height = 17
Alignment = taCenter
AlignToBand = False
DataSource = DS_RECKOPYA
DataField = 'yuzdeMR'
end
end
object Panel1: TPanel
Left = -1
Top = -1
Width = 556
Height = 265
BevelInner = bvLowered
BorderWidth = 4
Color = 33023
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
object ImageYatay: TImage
Left = 280
Top = 166
Width = 42
Height = 37
Picture.Data = {<image000.bmp>}
Visible = False
end
object ImageDikey: TImage
Left = 283
Top = 166
Width = 38
Height = 37
Picture.Data = {<image001.bmp>}
end
object Label4: TLabel
Left = 325
Top = 161
Width = 186
Height = 15
Alignment = taCenter
AutoSize = False
Caption = ' Yaz�c� Sol &Marjin (mm) '
Color = clYellow
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object LabelRY: TLabel
Left = 325
Top = 186
Width = 186
Height = 15
Alignment = taCenter
AutoSize = False
Caption = 'Y&an Yana Re�ete Say�s�'
Color = clYellow
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object LabelRUZ: TLabel
Left = 325
Top = 210
Width = 186
Height = 15
Alignment = taCenter
AutoSize = False
Caption = 'Re�.ler Aras� &Boydan Uzakl�k(mm)'
Color = clYellow
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object DBText1: TDBText
Left = 8
Top = 8
Width = 145
Height = 17
Color = clSilver
DataField = 'KURUM'
DataSource = DS_RecKase
ParentColor = False
end
object DBText2: TDBText
Left = 158
Top = 8
Width = 33
Height = 17
Color = clSilver
DataField = 'TIP'
DataSource = DS_RecKase
ParentColor = False
end
object Label7: TLabel
Left = 8
Top = 235
Width = 89
Height = 14
Caption = 'Syf.Y�k(0.1 mm)'
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label8: TLabel
Left = 9
Top = 210
Width = 87
Height = 14
Caption = 'Syf.Gen(0.1mm)'
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label9: TLabel
Left = 325
Top = 138
Width = 52
Height = 14
Caption = 'Sayfa Tipi'
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object BitBtnYAZ: TBitBtn
Left = 405
Top = 233
Width = 70
Height = 23
Caption = '&Yazd�r'
Font.Color = clTeal
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 21
OnClick = BitBtnONIZClick
end
object BitBtnONIZ: TBitBtn
Left = 331
Top = 233
Width = 70
Height = 23
Caption = 'R.�ni&zleme'
Font.Color = clRed
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 20
OnClick = BitBtnONIZClick
end
object BtnFONT: TBitBtn
Left = 231
Top = 233
Width = 96
Height = 23
Caption = 'Yaz�c� &Fontu'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 19
OnClick = BtnFONTClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FF3FFFFFFF33FFF003000000033
0000773777777733777703330033033330037FFF77F37F33377F700007330333
3003777777337FFFF77F303003337000007337F77F3377777773303073333033
003337F77F3337F377F337007333303300333777733337FF77F3330033333703
07333377F333377F7733330733333300033333773FF3F3777F33333399393300
033333337737FF777F333333339993307333333333777FF77333333333999930
3333333333777737333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object BtnKapa: TBitBtn
Left = 478
Top = 233
Width = 70
Height = 23
Caption = '��&k��'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 22
Kind = bkClose
end
object CheckBRecKDNo: TDBCheckBox
Left = 7
Top = 29
Width = 186
Height = 17
Caption = 'Re�.Kay�t Def. &No Yaz�ls�n'
Color = clYellow
DataField = 'RECKAYAZ'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckBVTrh: TDBCheckBox
Left = 7
Top = 51
Width = 186
Height = 17
Caption = 'Vize &Trh. Yaz�ls�n'
Color = clYellow
DataField = 'VIZEYAZ'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckBPr: TDBCheckBox
Left = 7
Top = 74
Width = 186
Height = 17
Caption = '&Protokol No Yaz�ls�n'
Color = clYellow
DataField = 'PRTOKOL'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 2
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckSira: TDBCheckBox
Left = 7
Top = 163
Width = 186
Height = 17
Caption = 'Re�etelere S�ra No &Verilsin'
Color = clYellow
DataField = 'SIRANO'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 6
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckBTop: TDBCheckBox
Left = 7
Top = 185
Width = 186
Height = 17
Caption = '&D�k�m Sonu Toplam� Yaz�ls�n'
Color = clYellow
DataField = 'DOKUMTOP'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 7
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckBRSayf: TDBCheckBox
Left = 7
Top = 96
Width = 186
Height = 17
Caption = '&Her Re�eteyi Ayr� Sayfaya Bas'
Color = clYellow
DataField = 'HERECAYRI'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 3
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object CheckBithal: TDBCheckBox
Left = 7
Top = 140
Width = 188
Height = 17
Caption = '�thal ve Y&erli �la�� ay�r,2 d�k.ver'
Color = clYellow
DataField = 'ITHALYAZ'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 5
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object RadioGrRKD: TDBRadioGroup
Left = 198
Top = 9
Width = 127
Height = 48
Caption = '&RE�.K.DEF NO BA�LI�I'
Color = clSilver
DataField = 'RKNOBAS'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
Items.Strings = (
'Ecz.Protokol No'
'Re�.Kay�t Def.No')
ParentColor = False
ParentFont = False
TabOrder = 9
Values.Strings = (
'E'
'R')
end
object RadioGrpSIRA: TDBRadioGroup
Left = 198
Top = 73
Width = 126
Height = 73
Caption = 'SIRA&LAMA KR�TER�'
Color = clOlive
DataField = 'SIRALAMAKRITER'
DataSource = DS_RecKase
Font.Color = clYellow
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
Items.Strings = (
'Re�.Kay�t Def.No'
'Re�.Trh+Sat�� No'
'Aln.Trh+Sat�� No'
'Seri No')
ParentColor = False
ParentFont = False
TabOrder = 10
Values.Strings = (
'D'
'R'
'A'
'S')
end
object RadioGrYatDik: TDBRadioGroup
Left = 200
Top = 160
Width = 81
Height = 44
Caption = 'Sayfa Y�n�'
Color = clSilver
DataField = 'SAYFAYON'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
Items.Strings = (
'Dikey'
'Yatay')
ParentColor = False
ParentFont = False
TabOrder = 8
Values.Strings = (
'D'
'Y')
OnChange = RadioGrYatDikClick
OnClick = RadioGrYatDikClick
end
object SpinEdit1: TDBEdit
Left = 515
Top = 158
Width = 30
Height = 23
DataField = 'MARJIN'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 13
end
object SpinEditRY: TDBEdit
Left = 515
Top = 181
Width = 30
Height = 23
DataField = 'YANYANAREC'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 14
end
object SpinEditUZ: TDBEdit
Left = 515
Top = 204
Width = 30
Height = 23
DataField = 'RECARBOYUZ'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 15
end
object CheckBCerceve: TDBCheckBox
Left = 7
Top = 118
Width = 186
Height = 17
Caption = '�la� ve Hesaplar� &�er�eveli Bas'
Color = clYellow
DataField = 'CERCEVE'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 4
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object GroupBox1: TGroupBox
Left = 328
Top = 6
Width = 219
Height = 127
Caption = 'Y�zde Ba�l�klar�n� Format�'
Color = clSilver
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 11
object Label1: TLabel
Left = 38
Top = 18
Width = 100
Height = 14
Caption = '�la�larda y�zdesi +'
end
object Label2: TLabel
Left = 15
Top = 40
Width = 123
Height = 14
Caption = '�la� Beraberi y�zdesi +'
end
object Label3: TLabel
Left = 13
Top = 62
Width = 125
Height = 14
Caption = '�zel Kat�l�ml� y�zdesi +'
end
object Label5: TLabel
Left = 39
Top = 85
Width = 99
Height = 14
Caption = '�thal �la� y�zdesi +'
end
object Label6: TLabel
Left = 3
Top = 107
Width = 135
Height = 14
Caption = 'Rap.lu �thal �la� y�zdesi +'
end
object DBEdit1: TDBEdit
Left = 142
Top = 12
Width = 73
Height = 22
DataField = 'ILACLAR'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 142
Top = 35
Width = 73
Height = 22
DataField = 'ILACBERA'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 142
Top = 58
Width = 73
Height = 22
DataField = 'OZKAT'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 142
Top = 80
Width = 73
Height = 22
DataField = 'ITHAL'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 142
Top = 102
Width = 73
Height = 22
DataField = 'RAPITHAL'
DataSource = DS_RecKase
MaxLength = 0
TabOrder = 4
end
end
object DBEdit6: TDBEdit
Left = 97
Top = 207
Width = 55
Height = 22
DataField = 'S_GENIS'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 0
ParentFont = False
TabOrder = 16
end
object DBEdit7: TDBEdit
Left = 97
Top = 231
Width = 55
Height = 22
DataField = 'S_YUKSEK'
DataSource = DS_RecKase
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 0
ParentFont = False
TabOrder = 17
end
object DBLookupComboBox2: TDBLookupComboBox
Left = 378
Top = 134
Width = 171
Height = 22
DataField = 'SAYFA_TIPI'
DataSource = DS_RecKase
DropDownRows = 9
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
KeyField = 'SAYI'
ListField = 'SAYFAADI'
ListSource = DS_TableSayfa
ParentFont = False
TabOrder = 12
end
object BitBtn1: TBitBtn
Left = 157
Top = 233
Width = 70
Height = 23
HelpContext = 899
Font.Color = clNavy
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
Kind = bkHelp
end
end
object QuickReport: TQuickReport
DataSource = DS_RECKOPYA
BeforePrint = QuickReportBeforePrint
ColumnMarginInches = 0
ColumnMarginMM = 0
Columns = 1
DisplayPrintDialog = True
LeftMarginInches = 0
LeftMarginMM = 0
Orientation = poPortrait
PageFrame.DrawTop = False
PageFrame.DrawBottom = False
PageFrame.DrawLeft = False
PageFrame.DrawRight = False
PaperLength = 0
PaperSize = qrpDefault
PaperWidth = 0
ReportTitle = 'Re�.Arkas� D�k�m�'
RestartData = True
SQLCompatible = False
TitleBeforeHeader = True
Left = 60
Top = 52
end
object T_HASTA: TTable
DatabaseName = 'ECZ'
IndexFieldNames = 'HASTANO'
ReadOnly = True
TableName = 'Hasta.DB'
Left = 240
Top = 197
object T_HASTAHASTANO: TAutoIncField
FieldName = 'HASTANO'
end
object T_HASTAHASTADI: TStringField
FieldName = 'HASTADI'
Size = 18
end
object T_HASTAHASTASOYAD: TStringField
FieldName = 'HASTASOYAD'
Size = 18
end
object T_HASTABAS1: TStringField
FieldName = 'BAS1'
Size = 17
end
object T_HASTABAS2: TStringField
FieldName = 'BAS2'
Size = 17
end
object T_HASTABAS3: TStringField
FieldName = 'BAS3'
Size = 17
end
object T_HASTABAS4: TStringField
FieldName = 'BAS4'
Size = 17
end
object T_HASTABAS5: TStringField
FieldName = 'BAS5'
Size = 17
end
object T_HASTABAS6: TStringField
FieldName = 'BAS6'
Size = 17
end
object T_HASTAVIZETRH: TDateField
FieldName = 'VIZETRH'
end
end
object DS_HASTA: TDataSource
DataSet = T_HASTA
Left = 224
Top = 189
end
object ECZACI: TTable
DatabaseName = 'ECZ'
ReadOnly = True
TableName = 'Ekim.DB'
Left = 344
Top = 268
object ECZACIEADI: TStringField
FieldName = 'EADI'
Size = 35
end
object ECZACIMESULAD: TStringField
FieldName = 'MESULAD'
Size = 36
end
object ECZACIADR1: TStringField
FieldName = 'ADR1'
end
object ECZACIADR2: TStringField
FieldName = 'ADR2'
end
object ECZACIADR3: TStringField
FieldName = 'ADR3'
end
object ECZACITLF: TStringField
FieldName = 'TLF'
Size = 11
end
end
object DS_ECZACI: TDataSource
DataSet = ECZACI
Left = 376
Top = 212
end
object DS_RECKOPYA: TDataSource
DataSet = QRecKopya
Left = 320
Top = 136
end
object DS_KRMLAR: TDataSource
DataSet = T_KRMLAR
Left = 344
Top = 160
end
object T_KRMLAR: TTable
DatabaseName = 'ECZ'
IndexFieldNames = 'KOD'
ReadOnly = True
TableName = 'KRMLAR.DB'
Left = 136
Top = 184
object T_KRMLARKOD: TStringField
FieldName = 'KOD'
Size = 11
end
object T_KRMLARILACLARDAKURUM: TFloatField
FieldName = 'ILACLARDAKURUM'
end
object T_KRMLAROZELKATILIMKURUM: TFloatField
FieldName = 'OZELKATILIMKURUM'
end
object T_KRMLARILACBERABERKURUM: TFloatField
FieldName = 'ILACBERABERKURUM'
end
object T_KRMLARILACLARDACALISAN: TFloatField
FieldName = 'ILACLARDACALISAN'
end
object T_KRMLAROZELKATILIMCALISAN: TFloatField
FieldName = 'OZELKATILIMCALISAN'
end
object T_KRMLARILACBERABERCALISAN: TFloatField
FieldName = 'ILACBERABERCALISAN'
end
object T_KRMLARILACLARDARAPYAT: TFloatField
FieldName = 'ILACLARDARAPYAT'
end
object T_KRMLAROZELKATILIMRAPYAT: TFloatField
FieldName = 'OZELKATILIMRAPYAT'
end
object T_KRMLARILACBERABERRAPYAT: TFloatField
FieldName = 'ILACBERABERRAPYAT'
end
object T_KRMLARILACLARDAEMEKLI: TFloatField
FieldName = 'ILACLARDAEMEKLI'
end
object T_KRMLAROZELKATILIMEMEKLI: TFloatField
FieldName = 'OZELKATILIMEMEKLI'
end
object T_KRMLARILACBERABEREMEKLI: TFloatField
FieldName = 'ILACBERABEREMEKLI'
end
object T_KRMLARHSP_ISKON: TStringField
FieldName = 'HSP_ISKON'
Size = 1
end
object T_KRMLARETIKET1: TStringField
FieldName = 'ETIKET1'
Size = 17
end
object T_KRMLARETIKET2: TStringField
FieldName = 'ETIKET2'
Size = 17
end
object T_KRMLARETIKET3: TStringField
FieldName = 'ETIKET3'
Size = 17
end
object T_KRMLARETIKET4: TStringField
FieldName = 'ETIKET4'
Size = 17
end
object T_KRMLARETIKET5: TStringField
FieldName = 'ETIKET5'
Size = 17
end
object T_KRMLARETIKET6: TStringField
FieldName = 'ETIKET6'
Size = 17
end
object T_KRMLARILACLARDADIGER: TFloatField
FieldName = 'ILACLARDADIGER'
end
object T_KRMLAROZELKATILIMDIGER: TFloatField
FieldName = 'OZELKATILIMDIGER'
end
object T_KRMLARILACBERABERDIGER: TFloatField
FieldName = 'ILACBERABERDIGER'
end
object T_KRMLARITHALKURUM: TFloatField
FieldName = 'ITHALKURUM'
end
object T_KRMLARITHALCALISAN: TFloatField
FieldName = 'ITHALCALISAN'
end
object T_KRMLARITHALRAPYAT: TFloatField
FieldName = 'ITHALRAPYAT'
end
object T_KRMLARITHALEMEKLI: TFloatField
FieldName = 'ITHALEMEKLI'
end
object T_KRMLARITHALDIGER: TFloatField
FieldName = 'ITHALDIGER'
end
object T_KRMLARAD: TStringField
FieldName = 'AD'
Size = 36
end
object T_KRMLARIHLRAPKURUM: TFloatField
FieldName = 'IHLRAPKURUM'
end
object T_KRMLARIHLRAPCALISAN: TFloatField
FieldName = 'IHLRAPCALISAN'
end
object T_KRMLARIHLRAPEMEKLI: TFloatField
FieldName = 'IHLRAPEMEKLI'
end
object T_KRMLARIHLRAPRAPYAT: TFloatField
FieldName = 'IHLRAPRAPYAT'
end
object T_KRMLARIHLRAPDIGER: TFloatField
FieldName = 'IHLRAPDIGER'
end
end
object QRecKopya: TQuery
BeforeOpen = QRecKopyaBeforeOpen
AfterOpen = QRecKopyaAfterOpen
BeforeClose = QRecKopyaBeforeClose
OnCalcFields = QRecKopyaCalcFields
DatabaseName = 'ECZ'
Params.Data = {01000100044854697000010200C7000001}
SQL.Strings = (
'SELECT * FROM RECTEMP'
'WHERE (HASTATIP=:HTip)'
'AND (NET IS NOT NULL)'
'ORDER BY RKDEFTERNO')
Left = 184
Top = 184
object QRecKopyaKURUMKOD: TStringField
FieldName = 'KURUMKOD'
Size = 11
end
object QRecKopyaALTARIH: TDateField
DisplayWidth = 8
FieldName = 'ALTARIH'
DisplayFormat = 'dd/mm/yy'
end
object QRecKopyaHASTANO: TIntegerField
FieldName = 'HASTANO'
OnGetText = QRecKopyaHASTANOGetText
end
object QRecKopyaHASTATIP: TStringField
FieldName = 'HASTATIP'
Size = 1
end
object QRecKopyaBAS1: TStringField
FieldName = 'BAS1'
Size = 17
end
object QRecKopyaBAS2: TStringField
FieldName = 'BAS2'
Size = 17
end
object QRecKopyaBAS3: TStringField
FieldName = 'BAS3'
Size = 17
end
object QRecKopyaBRUTN: TCurrencyField
FieldName = 'BRUTN'
DisplayFormat = '#,#'
end
object QRecKopyaBRUTO: TCurrencyField
FieldName = 'BRUTO'
DisplayFormat = '#,#'
end
object QRecKopyaBRUTI: TCurrencyField
FieldName = 'BRUTI'
DisplayFormat = '#,#'
end
object QRecKopyaHASTAKATPAY: TCurrencyField
FieldName = 'HASTAKATPAY'
DisplayFormat = '#,#'
end
object QRecKopyaNET: TCurrencyField
FieldName = 'NET'
DisplayFormat = '#,#'
end
object QRecKopyayuzdeN: TFloatField
Calculated = True
FieldName = 'yuzdeN'
DisplayFormat = '%0 ila�.da'
end
object QRecKopyayuzdeI: TFloatField
Calculated = True
FieldName = 'yuzdeI'
DisplayFormat = '%0 il�.berb'
end
object QRecKopyayuzdeO: TFloatField
Calculated = True
FieldName = 'yuzdeO'
DisplayFormat = '%0 �z.kat.l�'
end
object QRecKopyaPROTOKOLNO: TStringField
FieldName = 'PROTOKOLNO'
Size = 10
end
object QRecKopyaSATISNO: TFloatField
FieldName = 'SATISNO'
end
object QRecKopyaBAS4: TStringField
FieldName = 'BAS4'
Size = 17
end
object QRecKopyaBAS5: TStringField
FieldName = 'BAS5'
Size = 17
end
object QRecKopyaBAS6: TStringField
FieldName = 'BAS6'
Size = 17
end
object QRecKopyaVIZETRH: TDateField
FieldName = 'VIZETRH'
OnGetText = QRecKopyaVIZETRHGetText
end
object QRecKopyaBRUT: TCurrencyField
Calculated = True
FieldName = 'BRUT'
DisplayFormat = '#,#'
end
object QRecKopyaINDIR: TCurrencyField
Calculated = True
FieldName = 'INDIR'
DisplayFormat = '#,#'
end
object QRecKopyaIndirN: TCurrencyField
Calculated = True
FieldName = 'IndirN'
DisplayFormat = '#,#'
end
object QRecKopyaIndirI: TCurrencyField
Calculated = True
FieldName = 'IndirI'
DisplayFormat = '#,#'
end
object QRecKopyaIndirO: TCurrencyField
Calculated = True
FieldName = 'IndirO'
DisplayFormat = '#,#'
end
object QRecKopyaHKPn: TCurrencyField
Calculated = True
FieldName = 'HKPn'
DisplayFormat = '#,#'
end
object QRecKopyaHKPi: TCurrencyField
Calculated = True
FieldName = 'HKPi'
DisplayFormat = '#,#'
end
object QRecKopyaHKPo: TCurrencyField
Calculated = True
FieldName = 'HKPo'
DisplayFormat = '#,#'
end
object QRecKopyaBakiN: TCurrencyField
Calculated = True
FieldName = 'BakiN'
DisplayFormat = '#,#'
end
object QRecKopyaBakiI: TCurrencyField
Calculated = True
FieldName = 'BakiI'
DisplayFormat = '#,#'
end
object QRecKopyaNetN: TCurrencyField
Calculated = True
FieldName = 'NetN'
DisplayFormat = '#,#'
end
object QRecKopyaNetI: TCurrencyField
Calculated = True
FieldName = 'NetI'
DisplayFormat = '#,#'
end
object QRecKopyaNetO: TCurrencyField
Calculated = True
FieldName = 'NetO'
DisplayFormat = '#,#'
end
object QRecKopyaBakiO: TCurrencyField
Calculated = True
FieldName = 'BakiO'
DisplayFormat = '#,#'
end
object QRecKopyaRKDEFTERNO: TStringField
FieldName = 'RKDEFTERNO'
Size = 9
end
object QRecKopyaDRKOD: TIntegerField
FieldName = 'DRKOD'
end
object QRecKopyaSERINO: TStringField
FieldName = 'SERINO'
Size = 10
end
object QRecKopyaRECTARIH: TDateField
FieldName = 'RECTARIH'
end
object QRecKopyaFATARIH: TDateField
FieldName = 'FATARIH'
end
object QRecKopyaFATNO: TFloatField
FieldName = 'FATNO'
end
object QRecKopyaFATURANO: TStringField
FieldName = 'FATURANO'
Size = 11
end
object QRecKopyaYER: TStringField
FieldName = 'YER'
Size = 1
end
object QRecKopyaKDVA: TCurrencyField
FieldName = 'KDVA'
end
object QRecKopyaKDVB: TCurrencyField
FieldName = 'KDVB'
end
object QRecKopyaKDVC: TCurrencyField
FieldName = 'KDVC'
end
object QRecKopyaDZADR1: TStringField
FieldName = 'DZADR1'
Size = 30
end
object QRecKopyaDZADR2: TStringField
FieldName = 'DZADR2'
Size = 30
end
object QRecKopyaNETSON: TCurrencyField
Calculated = True
FieldName = 'NETSON'
DisplayFormat = '#,#'
end
object QRecKopyaHKPson: TCurrencyField
Calculated = True
FieldName = 'HKPson'
DisplayFormat = '#,#'
end
object QRecKopyaBRUTH: TCurrencyField
FieldName = 'BRUTH'
DisplayFormat = '#,#'
end
object QRecKopyaNetH: TCurrencyField
Calculated = True
FieldName = 'NetH'
DisplayFormat = '#,#'
end
object QRecKopyaBakiH: TCurrencyField
Calculated = True
FieldName = 'BakiH'
DisplayFormat = '#,#'
end
object QRecKopyaHKPh: TCurrencyField
Calculated = True
FieldName = 'HKPh'
DisplayFormat = '#,#'
end
object QRecKopyaIndirH: TCurrencyField
Calculated = True
FieldName = 'IndirH'
DisplayFormat = '#,#'
end
object QRecKopyayuzdeH: TFloatField
Calculated = True
FieldName = 'yuzdeH'
DisplayFormat = '%0 ithal il�'
end
object QRecKopyaBRUTMR: TCurrencyField
FieldName = 'BRUTMR'
DisplayFormat = '#,#'
end
object QRecKopyaNetMR: TCurrencyField
Calculated = True
FieldName = 'NetMR'
DisplayFormat = '#,#'
end
object QRecKopyaBakiMR: TCurrencyField
Calculated = True
FieldName = 'BakiMR'
DisplayFormat = '#,#'
end
object QRecKopyaHKPmr: TCurrencyField
Calculated = True
FieldName = 'HKPmr'
DisplayFormat = '#,#'
end
object QRecKopyaIndirMR: TCurrencyField
Calculated = True
FieldName = 'IndirMR'
DisplayFormat = '#,#'
end
object QRecKopyayuzdeMR: TFloatField
Calculated = True
FieldName = 'yuzdeMR'
DisplayFormat = '%0 Rp ithal'
end
object QRecKopyaNetTumIHL: TCurrencyField
Calculated = True
FieldName = 'NetTumIHL'
DisplayFormat = '#,#'
end
object QRecKopyaNetNONIthal: TCurrencyField
Calculated = True
FieldName = 'NetNONIthal'
DisplayFormat = '#,#'
end
object QRecKopyaBRTOPITHAL: TCurrencyField
Calculated = True
FieldName = 'BRTOPITHAL'
end
object QRecKopyaBRTOPYERLI: TCurrencyField
Calculated = True
FieldName = 'BRTOPYERLI'
end
object QRecKopyaHKPYERLI: TCurrencyField
Calculated = True
FieldName = 'HKPYERLI'
end
object QRecKopyaHKPITHAL: TCurrencyField
Calculated = True
FieldName = 'HKPITHAL'
end
end
object FontDialog1: TFontDialog
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Device = fdBoth
MinFontSize = 0
MaxFontSize = 0
Left = 292
Top = 241
end
object SATIS: TTable
OnCalcFields = SATISCalcFields
DatabaseName = 'ECZ'
IndexFieldNames = 'SATISNO'
MasterFields = 'SATISNO'
MasterSource = DS_RECKOPYA
ReadOnly = True
TableName = 'SATIS.DB'
Left = 248
Top = 196
object SATISSATISNO: TFloatField
FieldName = 'SATISNO'
end
object SATISILACNO: TIntegerField
FieldName = 'ILACNO'
end
object SATISFIYAT: TCurrencyField
FieldName = 'FIYAT'
DisplayFormat = '#,#'
end
object SATISMIKTAR: TIntegerField
FieldName = 'MIKTAR'
end
object SATISRECETETIP: TStringField
FieldName = 'RECETETIP'
Size = 1
end
object SATISbN: TCurrencyField
Calculated = True
FieldName = 'bN'
DisplayFormat = '#,#'
end
object SATISbI: TCurrencyField
Calculated = True
FieldName = 'bI'
DisplayFormat = '#,#'
end
object SATISbO: TCurrencyField
Calculated = True
FieldName = 'bO'
DisplayFormat = '#,#'
end
object SATISILAD: TStringField
FieldName = 'ILAD'
Lookup = True
LookupDataSet = T_URUN
LookupKeyFields = 'ILACNO'
LookupResultField = 'ILACAD'
KeyFields = 'ILACNO'
Size = 36
end
object SATISbH: TCurrencyField
Calculated = True
FieldName = 'bH'
DisplayFormat = '#,#'
end
object SATISbMR: TCurrencyField
Calculated = True
FieldName = 'bMR'
DisplayFormat = '#,#'
end
end
object DS_SATIS: TDataSource
DataSet = SATIS
Left = 288
Top = 204
end
object T_URUN: TTable
DatabaseName = 'ECZ'
ReadOnly = True
TableName = 'URUN.DB'
Left = 344
Top = 204
object T_URUNILACNO: TAutoIncField
FieldName = 'ILACNO'
end
object T_URUNILACAD: TStringField
FieldName = 'ILACAD'
Size = 36
end
end
object DetailLink: TQRDetailLink
DataSource = DS_SATIS
DetailBand = Detail
FooterBand = Master3
HeaderBand = PageHeader
Master = QuickReport
PrintBefore = True
Left = 516
Top = 135
end
object Query1: TQuery
DatabaseName = 'ECZ'
Params.Data = {01000100045361744E00030400010000000001}
SQL.Strings = (
'SELECT * FROM RECETE'
'WHERE RECETE.SATISNO=:SatN ')
Left = 224
Top = 154
object Query1RKDEFTERNO: TStringField
FieldName = 'RKDEFTERNO'
Size = 9
end
object Query1KURUMKOD: TStringField
FieldName = 'KURUMKOD'
Size = 11
end
object Query1SATISNO: TFloatField
FieldName = 'SATISNO'
end
object Query1DRKOD: TIntegerField
FieldName = 'DRKOD'
end
object Query1SERINO: TStringField
FieldName = 'SERINO'
Size = 10
end
object Query1PROTOKOLNO: TStringField
FieldName = 'PROTOKOLNO'
Size = 10
end
object Query1RECTARIH: TDateField
FieldName = 'RECTARIH'
end
object Query1ALTARIH: TDateField
FieldName = 'ALTARIH'
end
object Query1FATARIH: TDateField
FieldName = 'FATARIH'
end
object Query1FATNO: TFloatField
FieldName = 'FATNO'
end
object Query1FATURANO: TStringField
FieldName = 'FATURANO'
Size = 11
end
object Query1HASTANO: TIntegerField
FieldName = 'HASTANO'
end
object Query1HASTATIP: TStringField
FieldName = 'HASTATIP'
Size = 1
end
object Query1YER: TStringField
FieldName = 'YER'
Size = 1
end
object Query1BAS1: TStringField
FieldName = 'BAS1'
Size = 17
end
object Query1BAS2: TStringField
FieldName = 'BAS2'
Size = 17
end
object Query1BAS3: TStringField
FieldName = 'BAS3'
Size = 17
end
object Query1BRUTN: TCurrencyField
FieldName = 'BRUTN'
end
object Query1BRUTO: TCurrencyField
FieldName = 'BRUTO'
end
object Query1BRUTI: TCurrencyField
FieldName = 'BRUTI'
end
object Query1HASTAKATPAY: TCurrencyField
FieldName = 'HASTAKATPAY'
end
object Query1NET: TCurrencyField
FieldName = 'NET'
end
object Query1KDVA: TCurrencyField
FieldName = 'KDVA'
end
object Query1KDVB: TCurrencyField
FieldName = 'KDVB'
end
object Query1KDVC: TCurrencyField
FieldName = 'KDVC'
end
object Query1DZADR1: TStringField
FieldName = 'DZADR1'
Size = 30
end
object Query1DZADR2: TStringField
FieldName = 'DZADR2'
Size = 30
end
object Query1BAS4: TStringField
FieldName = 'BAS4'
Size = 17
end
object Query1BAS5: TStringField
FieldName = 'BAS5'
Size = 17
end
object Query1BAS6: TStringField
FieldName = 'BAS6'
Size = 17
end
object Query1VIZETRH: TDateField
FieldName = 'VIZETRH'
end
end
object BatchMove1: TBatchMove
Destination = RecKopya
Mode = batCopy
Source = Query1
Left = 331
Top = 174
end
object RecKopya: TTable
DatabaseName = 'ECZ'
TableName = 'RECTEMP.DB'
Left = 302
Top = 142
object RecKopyaHASTANO: TIntegerField
Alignment = taLeftJustify
DisplayLabel = 'Hasta Ad�'
DisplayWidth = 27
FieldName = 'HASTANO'
end
object RecKopyaHASTATIP: TStringField
DisplayLabel = 'Hst.Tip'
FieldName = 'HASTATIP'
Size = 1
end
object RecKopyaALTARIH: TDateField
DisplayLabel = 'Aln.Tarih'
DisplayWidth = 8
FieldName = 'ALTARIH'
DisplayFormat = 'dd.mm.yy'
end
object RecKopyaRECTARIH: TDateField
DisplayLabel = 'Re�.Trh.'
DisplayWidth = 8
FieldName = 'RECTARIH'
DisplayFormat = 'dd.mm.yy'
end
object RecKopyaBRUTO: TCurrencyField
FieldName = 'BRUTO'
Visible = False
end
object RecKopyaBRUTN: TCurrencyField
FieldName = 'BRUTN'
Visible = False
end
object RecKopyaBRUTI: TCurrencyField
FieldName = 'BRUTI'
Visible = False
end
object RecKopyaKURUMKOD: TStringField
FieldName = 'KURUMKOD'
Visible = False
Size = 11
end
object RecKopyaRKDEFTERNO: TStringField
FieldName = 'RKDEFTERNO'
Visible = False
Size = 9
end
object RecKopyaFATURANO: TStringField
FieldName = 'FATURANO'
Visible = False
Size = 11
end
object RecKopyaFATARIH: TDateField
FieldName = 'FATARIH'
Visible = False
end
object RecKopyaHASTAKATPAY: TCurrencyField
Calculated = True
DisplayLabel = 'Hst. Kat.Pay.'
DisplayWidth = 12
FieldName = 'HASTAKATPAY'
end
object RecKopyaNET: TCurrencyField
Calculated = True
DisplayLabel = 'NET TUTAR'
DisplayWidth = 16
FieldName = 'NET'
end
object RecKopyaBAS1: TStringField
DisplayLabel = '1.Ba�l�k'
FieldName = 'BAS1'
Size = 17
end
object RecKopyaBAS2: TStringField
DisplayLabel = '2.Ba�l�k'
FieldName = 'BAS2'
Size = 17
end
object RecKopyaBAS3: TStringField
DisplayLabel = '3.Ba�l�k'
FieldName = 'BAS3'
Size = 17
end
object RecKopyaSATISNO: TFloatField
DisplayLabel = 'Sat�� No'
DisplayWidth = 8
FieldName = 'SATISNO'
end
object RecKopyaKDVC: TCurrencyField
DisplayLabel = '3. T�P KDV'
FieldName = 'KDVC'
Visible = False
end
object RecKopyaKDVB: TCurrencyField
DisplayLabel = '2. T�P KDV'
FieldName = 'KDVB'
Visible = False
end
object RecKopyaKDVA: TCurrencyField
DisplayLabel = '1. T�P KDV'
DisplayWidth = 10
FieldName = 'KDVA'
Visible = False
end
end
object Tab_RecKase: TTable
DatabaseName = 'ECZ'
TableName = 'RECKASE.db'
Left = 123
Top = 69
object Tab_RecKaseKURUM: TStringField
FieldName = 'KURUM'
Size = 11
end
object Tab_RecKaseTIP: TStringField
FieldName = 'TIP'
Size = 1
end
object Tab_RecKaseRECKAYAZ: TBooleanField
FieldName = 'RECKAYAZ'
end
object Tab_RecKaseVIZEYAZ: TBooleanField
FieldName = 'VIZEYAZ'
end
object Tab_RecKasePRTOKOL: TBooleanField
FieldName = 'PRTOKOL'
end
object Tab_RecKaseSIRANO: TBooleanField
FieldName = 'SIRANO'
end
object Tab_RecKaseDOKUMTOP: TBooleanField
FieldName = 'DOKUMTOP'
end
object Tab_RecKaseITHALYAZ: TBooleanField
FieldName = 'ITHALYAZ'
end
object Tab_RecKaseCERCEVE: TBooleanField
FieldName = 'CERCEVE'
end
object Tab_RecKaseSIRALAMAKRITER: TStringField
FieldName = 'SIRALAMAKRITER'
Size = 1
end
object Tab_RecKaseSAYFAYON: TStringField
FieldName = 'SAYFAYON'
Size = 1
end
object Tab_RecKaseRKNOBAS: TStringField
FieldName = 'RKNOBAS'
Size = 1
end
object Tab_RecKaseFONTADI: TStringField
FieldName = 'FONTADI'
Size = 25
end
object Tab_RecKaseCOLOR: TIntegerField
FieldName = 'COLOR'
end
object Tab_RecKaseYANYANAREC: TSmallintField
FieldName = 'YANYANAREC'
MaxValue = 8
MinValue = 1
end
object Tab_RecKaseMARJIN: TSmallintField
FieldName = 'MARJIN'
MaxValue = 80
end
object Tab_RecKaseRECARBOYUZ: TSmallintField
FieldName = 'RECARBOYUZ'
MaxValue = 180
MinValue = 1
end
object Tab_RecKaseHERECAYRI: TBooleanField
FieldName = 'HERECAYRI'
end
object Tab_RecKaseFONTSIZE: TSmallintField
FieldName = 'FONTSIZE'
end
object Tab_RecKaseFONTSTYLE: TStringField
FieldName = 'FONTSTYLE'
Size = 1
end
object Tab_RecKaseILACLAR: TStringField
FieldName = 'ILACLAR'
Size = 10
end
object Tab_RecKaseILACBERA: TStringField
FieldName = 'ILACBERA'
Size = 10
end
object Tab_RecKaseOZKAT: TStringField
FieldName = 'OZKAT'
Size = 10
end
object Tab_RecKaseITHAL: TStringField
FieldName = 'ITHAL'
Size = 10
end
object Tab_RecKaseRAPITHAL: TStringField
FieldName = 'RAPITHAL'
Size = 10
end
object Tab_RecKaseS_YUKSEK: TSmallintField
FieldName = 'S_YUKSEK'
end
object Tab_RecKaseS_GENIS: TSmallintField
FieldName = 'S_GENIS'
end
object Tab_RecKaseSAYFA_TIPI: TStringField
FieldName = 'SAYFA_TIPI'
Size = 9
end
end
object DS_RecKase: TDataSource
DataSet = Tab_RecKase
Left = 303
Top = 189
end
object TableSayfa: TTable
DatabaseName = 'ECZ'
TableName = 'sayfalar.DB'
Left = 301
Top = 109
object TableSayfaSAYFAADI: TStringField
FieldName = 'SAYFAADI'
Size = 44
end
object TableSayfaDMWINDEGER: TStringField
FieldName = 'DMWINDEGER'
Size = 43
end
object TableSayfaSAYI: TStringField
FieldName = 'SAYI'
Size = 9
end
object TableSayfaSAYIWIN: TIntegerField
FieldName = 'SAYIWIN'
end
end
object DS_TableSayfa: TDataSource
DataSet = TableSayfa
Left = 349
Top = 61
end
end